o 




■ - ' " ' 


u 

o 

PAGt: i 

PARAH 

SRC parameter 

MqDE 


o 

o 



iTITUE 

parameter MODE 


o 








o 



/digital equipment CORPORATION! 

MAYNARDi MASSi 

o 



/EP HIUTON 
/ 

1 ABS 




o 

o 

o 

01100 

0001?60 

700312 

.IOC 

/ 

UPR£PX=560 

KRB=700312 

1100 


o 



0 0 0 !? 2 2 

TYP0NE=522 




o 


0 0 0 1? 1 4 
00071?6 

CRUF=514 

SLINKS756 



o 

o 


0 0 0 1? 4 S 
0002153 

PSOD=540 

WAJT=263 



o 


000120 

GETMOrs| = 120 





000460 

TSIXBT=460 






707764 

E8A=707764 



o 

o 


707702 

EEM=707702 

/ 

START JHS 




01100 

100&14 

CRL,F 


o 

o 

01101 

100!?60 

JHS 

uprefx 

/TYPE the PREPIX FOLLOWED BY 

01102 

201363 

lAC 

(PARAMel 

/parameter mode, 



01103 

100460 

JMS 

tsixbt 

o 

o 

01104 

707764 

EBA 




01101? 

707702 

EEM 





01106 

201364 

L,AC 

(SUNK 

/EXPECT EITHER CARRIAGE 

o 

o 

01107 

041346 

DAC 

SEPTRA 

/RETURN OR SOME OCTAL DIGITS 


01110 

201366 

EAC 

(1 

/TO replace the UODSW, 



01111 

041344 

DAC 

NUM# 

/THEN GO TO NEXT TITLE, 

o 

o 

01112 

100614 

PANAMA JMS 

CRUF 


01113 

221346 


Sl,PTR 




01114 

740200 

S^A 



o 

0 

01111? 

601120 

JMP 

.+3 



01116 

700312 

KRB 





01117 

600122 

JMP 

GETMON+2 


o 

o 

01120 

i54l3i?6 

TAD 

(6) 



01121 

041347 

DAC 

TITPTH# 




01122 

221347 

lAC^t 

titptr 


o 

o 

01123 

041271 

DAC 

PBUFF 



01124 

441347 

IS2 

titptr 




011215 

221347 

UAC<» 

Ti'TPTR 


o 

o 

01126 

041272 

DAC 

PBUFF + 1 


01127 

201344 

PARAMF DAC 

NUM 




01130 

101300 

JMS 

PR2DP 


o 

o 

01131 

101320 

JMS 

SPACE2 


01132 

201367 

DAC 

(PBUFFsl 




01133 

100460 

JMS 

TSIXBT 

/PRINT THE TITLE 

o 

o 

01134 

101320 

JMS 

.EJECT 

SPACF2 



o 






o 


o o 


u 


o 




PAfUM 

SRC PARAMETER 

MODE 


100253 

PARAM8 

JMS 

WAIT 

311^6 

101220 


JMS 

TCRCP 

31137 

541360 


SAD 

(336 

01140 

601331 


JMP 

BACKUP 

01141 

501361 


AND 

(177) 

01142 

541362 


SAD 

(175) 

01143 

601154 


JMP 

PARAMC 

01144 

541363 


SAD 

(176) 

0114S 

601154 


JMP 

PARAMG 

0114 6 

541364 


SAD 

(33) 

01147 

601154 


JMP 

PARAMG 

01150 

760277 


law 

277 

0 1151 

100522 


JMS 

TYPONE 

01152 

100514 


JMS 

CRLF 

01l5v5 

601127 


JMP 

PARAMF 

01154 

777774 

PARAMG 

LAW 

■■•?4 

01155 

041352 


DAC 

WDCMT» 

01156 

221345 


LAC« 

SLPTR" 

01157 

041351 


DAC 

U(jDSWP# 

01160 

221351 

PARAMC 

LAC<^ 

UPDSWP 

01161 

100540 


JMS 

PSQD 

01162 

101274 


JMS 

SPACE! 

01163 

100253 


JMS 

WAIT 

01164 

101220 


JMS 

TCRCP 

01165 

501361 


AMD 

(177) 

01166 

5 4 1 3 6 3 


SAD 

(i'/6) 

01167 

601175 


JMP 

PARAMO 

01170 

541362 


SAD 

(175) 

01171 

601175 


JMP 

pAramp 

01172 

541364 


SAD 

(33) 

01173 

01174 

741000 

601203 


SKP 

JMP 

PARAME 

01175 

441351 

paRamd 

ISZ 

yoDSWP 

01176 

441352 


ISH 

NOCNT 

01177 

601160 


JMP 

PARAMC 

01200 

441344 


IS2 

NUM 

01201 

441345 


ISZ 

SLPTR 

01202 

601112 


JMP 

/ 

D2M 

PARANA 

01203 

141342 

PARAME 

f\it 

01204 

101230 


JMS 

STORE 

01205 

100253 

NXTCHR 

JMS 

WAIT 

01206 

101220 


JMS 

TCRCP 

01207 

501361 


AMD 

(177) 

01210 

5 4 1 3 6 3 


SAD 

!i/6) 

01211 

601265 


JMP 

XCHANG 

31212 

541362 


SAD 

(175) 

01213 

6 0 126 5 


JMP 

XCHANG 

01214 

541364 


SAD 

(33) 

01215 

601265 


JMP 

XCHANG 

01216 

101230 


JMS 

STORE 

01217 

601205 


JMP 

NXTCHR 


lEJECT 


/TEST FOR carriage RETURN 
/control Cl OR CONTROL P 

/altmode? 


/unidentified character 

/PRINT ? 

/GET address of UODSW 
/GET WORD IN USER PROGRAM 


/change data word 

/PRINT THE NEXT ONE 


o 



P A G E 6 

PAP AM 

SRC parameter 

MODE 

o 

3X2^D 

000000 

TCRCP 

0 

/test for 


0X22X 

541365 


SAD 

(203 


01222 

600120 


JMP 

GETMOfM 

o 

0X223 

541366 


SAD 

(220 


0X224 

601100 


JMP 

START 

o 

01225 

54136/ 


SAD 

(215 

01226 

601200 


JMP 

PARAMD-*'3 


0122 7 

621220 


JMP« 

/ 

0 

TCRCP ~ 

o 

01230 

000000 

STORE 



01231 

541370 


SAD 

(377 


01232 

601251 


JMP 

RUBOUT 

o 

01233 

341371 


TAD 

(«70 


0123 4 

740100 


SMA 


o 

01235 

601262 


JMP 

ILCHAR 

01236 

341372 


TAD 

(10 


01237 

741100 


SPA 


0 

0124 0 

601262 


JMP 

ILCHAR 

01241 

041343 


DAC 



01242 

201342 


LAC 

A" 


01243 

744010 


RCL 


o 

01244 

744010 


RCL 



0124 5 

744010 


RCL 


o 

01246 

241343 


XOR 

B 

01247 

01250 

041342 

621230 


DAC 

JMPi^ 

/ 

LAW 

A 

STORE 


o 

01251 

760334 

RUaOUT 

334 


01252 

100522 


JMS 

TYRONE 

o 

01253 

201342 


LAC 

A 

01254 

744020 


RCR 



01255 

744020 


RCR 



01256 

744020 


RCR 


0 

01257 

744000 


CLL 



01260 

041342 


DAC 

A 


01261 

621230 


JMP^^ 

STORE 

o 




/ 



01262 

760277 

ILCHAR 

LAW 

277 

o 

01263 

100522 


JMS 

TYRONE 

0126 4 

621230 


JMP<* 

/ 

LAC 

store" 


01265 

201342 

XCHANG 

A 

o 

01266 

061351 


DAC<t 

UOOSWP 

01267 

1012 7 4 


JMS 

SPACE! 


01270 

601175 


JMP 

PARAMU 

o 




/ 



01271 

000000 

PBUFF 

0 



01272 

000000 


0 


o 

01273 

000000 


0 

, EJECT 



o 


o 

o 


o 

o 

CR|fC,OR*P O 

o 

O 

O 

O 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


PAGt: 


4 

par AM 

SRC parameter 

MODE 

01274 

000000 

SPACEl 

0 


01275 

760240 


LAW 

240 

0X276 

100522 


JMS 

TYRONE 

0X277 

6212/4 


JMP« 

/ 

SPACEl 

01300 

000000 

PR2DP 

/ 

0 


01301 

141346 


D2M 

TENS^ 

0X302 

341373 


TAD 

( ^X2 

01303 

741100 


SPA 


01304 

601307 


JMP 

1 *3 

01305 

441346 


ISH 

TENS 

01306 

601302 


JMP 

( r'A 

01307 

341374 


TAD 

U2 

01310 

041350 


DAC 

UNITS^ 

01311 

201346 


LAC 

TENS 

01312 

3413/5 


TAD 

(260 

01313 

1P0522 


JMS 

TYRONE 

01314 

201350 


LAC 

UNITS 

01315 

341375 


TAD 

(260 

01316 

100522 


JMS 

TYRONE 

01317 

621300 


J M P 
/ 

0 

PH2DP” 

01320 

000000 

SPACE2 


01321 

1012/4 


JMS 

SPACE! 

01322 

1012/4 


JMS 

SPACE! 

01323 

621320 


JMP» 

/ 

iSIXBT 

SPACE2 

01324 

200122 

PARAM 

’PARAMET 

01325 

011505 




01326 

01327 

w 1 X n 

240522 

401517 




iiJ i O v; U 

01331 

V) W lO u 

777777 

BACKUP 

LAW 

■«1 

01332 

341344 


TAD 

NUM 

01333 

741200 


SNA 


01334 

601106 


JMP 

PARAMA«4 

01335 

041344 


DAC 

NUM 

01336 

777771 


LAW 


01337 

341345 


TAD 

SUPTR 

01340 

041345 


DAC 

SLPTR 

01341 

601112 


JMP 

PARANA 


/PRINT TWO decimal DIGITS 


, EJECT 


PAGE 



PAR AM 

SRC 

01:5 

000000 

001323 


03.3t>4 

0 00/56 


013^5 

000001 


01356 

000006 


01357 

0012/0 

^^E 

01360 

000336 


01361 

0001/7 


01362 

000175 


01363 

000176 


01364 

000033 

»E 

01565 

0 0 0203 


01366 

000220 

^»E 

01367 

000215 


01370 

000377 

'^E 

01371 

777710 


01372 

000010 

^E 

01373 

777766 

^E 

01374 

000012 

^E 

01375 

000260 



SlzfE = 03;376 


PAfUMETER MODE 


,ENP 


NO ERROR IIHES 



page: 6 pakam src parameter mode 


A 

D13A2 

8 

01343 

EF3A 

707764 

EEM 

707702 

KR8 

700312 

NUM 

01344 

PARAMA 

01112 

PARAMB 


PA.RAME 

01203 

PARAMF 

01127 

PH2DD 

01300 

PSQD 

000540 

SLPTR 

01345 

SPACE! 

01274 

STORE 

01230 

TCRCP 

01220 

TSIXBT 

00046y 

TYRONE 

000522 

UPREFX 

000560 

WAIT 

0002S>3 


BACKUP 

01331 

CRLF 

000514 

GETMQN 

000120 

IUCHAR 

01262 

NXTCHR 

‘0120^3 

PARAM 

01324 

PARAMC 

01160 

PARAMO 

01175 

PARAMG 

01154 

PBUFF 

01271 

RUBOUT 

01251 

SUNK 

000756 

SPACE2 

01320 

start 

01100 

TEfslS 

01346 

TITPTR 

01347 

UNITS 

01350 

UODSWP 

01351 

WOCNT 

01352 

XCHANG 

01265 


o 



PAGl; 

7 PARAM 

SRc; 

PARAMETER 

MODE 




o 

GET MON 

000120 

HA IT 

000253 

TSIXBT 

000460 

CRUF 

000514 


TYRONE 

000522 

PSOD 

000540 

UPREFX 

000560 

SI, INK 

000756 


START 

01100 

PARANA 

01112 

paramf 

'01127 

PARAMB 

01135 

o 

P A R A M G 

01154 

PARAMC 

01160 

PARAMO 

01175 

PARAMF 

01203 


NXTCHR 

01205 

TCRCP 

01220 

STORE 

01230 

RUBOUT 

01251 


ILCHAR 

01262 

XCHANG 

01265 

PBUPF 

01271 

SPACEl 

01274 

o 

PR2D0 

01300 

SPACE2 

01320 

PARAM 

01324 

BACKUP 

01331 


A 

01342 

B 

01343 

NUM 

01344 

SUPTR 

01345 

o 

TENS 

01346 

TITPTR 

01347 

UNITS 

01350 

UUPSWP 

01351 

WPCNT 

01352 

KRB 

700312 

EEM" 

707702 

EBA 

707764 


o 


o 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 


{J 


o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 

o 



